object Form1: TForm1
  Left = 112
  Top = 256
  Width = 800
  Height = 375
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 44
    Top = 12
    Width = 69
    Height = 21
    AutoSize = False
    Caption = 'Conta'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object BitBtn1: TBitBtn
    Left = 608
    Top = 8
    Width = 75
    Height = 25
    Caption = 'Pesquisar'
    TabOrder = 1
  end
  object DBGrid1: TDBGrid
    Left = 28
    Top = 108
    Width = 753
    Height = 189
    DataSource = DataSource1
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'Lancamento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Data'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Credora'
        Width = 43
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Devedora'
        Width = 62
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Hp'
        Width = 28
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Complemento'
        Width = 300
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Valor'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Usuario'
        Visible = True
      end>
  end
  object MaskEdit1: TMaskEdit
    Left = 128
    Top = 12
    Width = 49
    Height = 21
    EditMask = '999999;0;_'
    MaxLength = 6
    TabOrder = 0
  end
  object Edit1: TEdit
    Left = 180
    Top = 12
    Width = 333
    Height = 21
    TabOrder = 3
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 724
    Top = 12
  end
  object Query1: TQuery
    ObjectView = True
    DatabaseName = 'Caixa'
    SQL.Strings = (
      
        'select * from diario where credora  = :credora  or devedora = :d' +
        'evedora ')
    Left = 688
    Top = 12
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'credora'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'devedora'
        ParamType = ptUnknown
      end>
    object Query1Lancamento: TIntegerField
      FieldName = 'Lancamento'
      Origin = 'CAIXA."diario.DB".Lancamento'
    end
    object Query1Data: TDateField
      FieldName = 'Data'
      Origin = 'CAIXA."diario.DB".Data'
    end
    object Query1Credora: TStringField
      FieldName = 'Credora'
      Origin = 'CAIXA."diario.DB".Credora'
      Size = 6
    end
    object Query1Devedora: TStringField
      FieldName = 'Devedora'
      Origin = 'CAIXA."diario.DB".Devedora'
      Size = 6
    end
    object Query1Hp: TFloatField
      FieldName = 'Hp'
      Origin = 'CAIXA."diario.DB".Hp'
    end
    object Query1Complemento: TStringField
      FieldName = 'Complemento'
      Origin = 'CAIXA."diario.DB".Complemento'
      Size = 240
    end
    object Query1Valor: TFloatField
      FieldName = 'Valor'
      Origin = 'CAIXA."diario.DB".Valor'
    end
    object Query1Usuario: TStringField
      FieldName = 'Usuario'
      Origin = 'CAIXA."diario.DB".Usuario'
      Size = 10
    end
  end
end
